home *** CD-ROM | disk | FTP | other *** search
/ QRZ! Ham Radio 8 / QRZ Ham Radio Callsign Database - Volume 8.iso / pc / files / p_misc / stats.arc / AUTOEXEC.BAT < prev    next >
DOS Batch File  |  1989-06-18  |  2KB  |  71 lines
  1. echo off
  2. :start
  3. rem normal start up routine repeats if a second start is asked for
  4. keybuk
  5. mode el 5
  6. mode lpt1:=com1:
  7. path c:\;a:\
  8. c:
  9. prompt sH$p6H$d    $t9H u$g
  10. rem Check for A:LOG already existing attempt to rename if it does
  11. if exist a:log. goto changelog
  12. :runit
  13. now >logstart
  14. stats b 9600;t
  15. now >logend
  16. rem Copy log from RAMDISK to Floppy disk for keeping!
  17. copy c:log*. a:log*.
  18. if not errorlevel 0 goto errortime
  19. echo      .
  20. rem Now ask about a restart if required this allows backups
  21. a:ask "start again or quit (s/q) ?",qs
  22. if errorlevel 2 goto start
  23. if errorlevel 1 goto finish
  24. :changelog
  25. :rename
  26. if exist a:log.bak goto bakfound
  27. ren a:log*. log*.bak
  28. if not errorlevel 0 goto errortime
  29. goto runit
  30. :bakfound
  31. echo     .
  32. a:ask "A backup log has been found delete,rename or quit [d/r/q] ?",qdr
  33. if errorlevel 3 goto changebakname
  34. if errorlevel 2 goto deletelogbak
  35. if errorlevel 1 goto finish
  36. :deletelogbak
  37. del a:log*.bak
  38. if not errorlevel 0 goto errortime
  39. goto rename
  40. :changebakname
  41. if exist a:log2.bak goto toomuch
  42. ren a:log*.bak log2*.bak
  43. if not errorlevel 0 goto errortime
  44. goto runit
  45. :bakfound
  46. echo     .
  47. a:ask "A backup log has been found delete,rename or quit [d/r/q] ?",qdr
  48. if errorlevel 3 goto changebakname
  49. if errorlevel 2 goto deletelogbak
  50. if errorlevel 1 goto finish
  51. :deletelogbak
  52. del a:log*.bak
  53. if not errorlevel 0 goto errortime
  54. goto rename
  55. :toomuch
  56. echo    .
  57. echo Sorry a:log2.bak also exist's you rename it yourself!
  58. goto end
  59. :errortime
  60. echo   .
  61. echo   .
  62. echo Whoops something is wrong please takeover the driving seat!
  63. goto end
  64. :finish
  65. echo   .
  66. echo   .
  67. echo Stats run now completed your LOG file has been copied to the A: drive.
  68. :end
  69. echo    .
  70. echo Bye
  71.